#' gsaanno UI Function
#'
#' @description A shiny Module.
#'
#' @param id,input,output,session Internal parameters for {shiny}.
#'
#' @noRd
#'
#' @importFrom shiny NS tagList
mod_gsaanno_ui <- function(id){
  ns <- NS(id)
  tagList(
    bs4Dash::tabsetPanel(
      id = NULL,
      tabPanel(
        "File upload",
        icon = icon("cloud-upload-alt"),
        mod_gsaanno_fileUpload_ui("gsaanno_fileUpload_ui_1")
      ),
      tabPanel(
        "Gene Info",
        icon = icon("dna"),
        mod_gsaanno_geneInfo_ui("gsaanno_geneInfo_ui_1")
      ),
      tabPanel(
        "KEGG",
        icon = icon("project-diagram"),
        mod_gsaanno_kegg_ui("gsaanno_kegg_ui_1")
      ),
      tabPanel(
        "GO",
        icon = icon("chart-bar"),
        mod_gsaanno_go_ui("gsaanno_go_ui_1")
      ),
      tabPanel(
        "🍰 ⋆ 🍑  🎀  𝒮𝒾𝓂𝓅𝓁𝒾𝒻𝓎  🎀  🍑 ⋆ 🍰",
        icon = icon("simplybuilt"),
        mod_gsaanno_simplify_ui("gsaanno_simplify_ui_1")
      )
    )
  )
}

#' gsaanno Server Functions
#'
#' @noRd
mod_gsaanno_server <- function(id){
  moduleServer( id, function(input, output, session){
    ns <- session$ns

  })
}

## To be copied in the UI
# mod_gsaanno_ui("gsaanno_ui_1")

## To be copied in the server
# mod_gsaanno_server("gsaanno_ui_1")
